home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1996 May: Tool Chest / Developer CD Series May 1996 (Tool Chest) (Apple Computer) (1996).iso / Tool Chest / Interfaces & Libraries / Interfaces / PInterfaces / ImageCompression.p < prev    next >
Encoding:
Text File  |  1995-07-06  |  33.5 KB  |  865 lines  |  [TEXT/MPS ]

  1. {
  2.      File:        ImageCompression.p
  3.  
  4.      Contains:    QuickTime Image Compression Interfaces.
  5.  
  6.      Version:    Technology:    QuickTime 2.0
  7.                  Package:    Universal Interfaces 2.1 in “MPW Latest” on ETO #18
  8.  
  9.      Copyright:    © 1984-1995 by Apple Computer, Inc.
  10.                  All rights reserved.
  11.  
  12.      Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13.                  stack.  Include the file and version information (from above)
  14.                  in the problem description and send to:
  15.                      Internet:    apple.bugs@applelink.apple.com
  16.                      AppleLink:    APPLE.BUGS
  17.  
  18. }
  19.  
  20. {$IFC UNDEFINED UsingIncludes}
  21. {$SETC UsingIncludes := 0}
  22. {$ENDC}
  23.  
  24. {$IFC NOT UsingIncludes}
  25.  UNIT ImageCompression;
  26.  INTERFACE
  27. {$ENDC}
  28.  
  29. {$IFC UNDEFINED __IMAGECOMPRESSION__}
  30. {$SETC __IMAGECOMPRESSION__ := 1}
  31.  
  32. {$I+}
  33. {$SETC ImageCompressionIncludes := UsingIncludes}
  34. {$SETC UsingIncludes := 1}
  35.  
  36.  
  37. {$IFC UNDEFINED __TYPES__}
  38. {$I Types.p}
  39. {$ENDC}
  40. {    ConditionalMacros.p                                            }
  41.  
  42. {$IFC UNDEFINED __QUICKDRAW__}
  43. {$I Quickdraw.p}
  44. {$ENDC}
  45. {    MixedMode.p                                                    }
  46. {    QuickdrawText.p                                                }
  47.  
  48. {$IFC UNDEFINED __QDOFFSCREEN__}
  49. {$I QDOffscreen.p}
  50. {$ENDC}
  51. {    Errors.p                                                    }
  52.  
  53. {$IFC UNDEFINED __COMPONENTS__}
  54. {$I Components.p}
  55. {$ENDC}
  56.  
  57. {$IFC UNDEFINED __WINDOWS__}
  58. {$I Windows.p}
  59. {$ENDC}
  60. {    Memory.p                                                    }
  61. {    Events.p                                                    }
  62. {        OSUtils.p                                                }
  63. {    Controls.p                                                    }
  64. {        Menus.p                                                    }
  65.  
  66. {$IFC UNDEFINED __STANDARDFILE__}
  67. {$I StandardFile.p}
  68. {$ENDC}
  69. {    Dialogs.p                                                    }
  70. {        TextEdit.p                                                }
  71. {    Files.p                                                        }
  72. {        Finder.p                                                }
  73.  
  74. {$PUSH}
  75. {$ALIGN MAC68K}
  76. {$LibExport+}
  77.  
  78. TYPE
  79.     MatrixRecord = RECORD
  80.         matrix:                    ARRAY [0..2,0..2] OF Fixed;
  81.     END;
  82.  
  83.     MatrixRecordPtr = ^MatrixRecord;
  84.  
  85.     FixedPoint = RECORD
  86.         x:                        Fixed;
  87.         y:                        Fixed;
  88.     END;
  89.  
  90.     FixedRect = RECORD
  91.         left:                    Fixed;
  92.         top:                    Fixed;
  93.         right:                    Fixed;
  94.         bottom:                    Fixed;
  95.     END;
  96.  
  97. { These are the bits that are set in the Component flags, and also in the codecInfo struct. }
  98.  
  99. CONST
  100.     codecInfoDoes1                = 0+(1 * (2**(0)));
  101.     codecInfoDoes2                = 0+(1 * (2**(1)));
  102.     codecInfoDoes4                = 0+(1 * (2**(2)));
  103.     codecInfoDoes8                = 0+(1 * (2**(3)));
  104.     codecInfoDoes16                = 0+(1 * (2**(4)));
  105.     codecInfoDoes32                = 0+(1 * (2**(5)));
  106.     codecInfoDoesDither            = 0+(1 * (2**(6)));
  107.     codecInfoDoesStretch        = 0+(1 * (2**(7)));
  108.     codecInfoDoesShrink            = 0+(1 * (2**(8)));
  109.     codecInfoDoesMask            = 0+(1 * (2**(9)));
  110.     codecInfoDoesTemporal        = 0+(1 * (2**(10)));
  111.     codecInfoDoesDouble            = 0+(1 * (2**(11)));
  112.     codecInfoDoesQuad            = 0+(1 * (2**(12)));
  113.     codecInfoDoesHalf            = 0+(1 * (2**(13)));
  114.     codecInfoDoesQuarter        = 0+(1 * (2**(14)));
  115.     codecInfoDoesRotate            = 0+(1 * (2**(15)));
  116.     codecInfoDoesHorizFlip        = 0+(1 * (2**(16)));
  117.     codecInfoDoesVertFlip        = 0+(1 * (2**(17)));
  118.     codecInfoDoesSkew            = 0+(1 * (2**(18)));
  119.     codecInfoDoesBlend            = 0+(1 * (2**(19)));
  120.     codecInfoDoesWarp            = 0+(1 * (2**(20)));
  121.     codecInfoDoesRecompress        = 0+(1 * (2**(21)));
  122.     codecInfoDoesSpool            = 0+(1 * (2**(22)));
  123.     codecInfoDoesRateConstrain    = 0+(1 * (2**(23)));
  124.  
  125.     codecInfoDepth1                = 0+(1 * (2**(0)));
  126.     codecInfoDepth2                = 0+(1 * (2**(1)));
  127.     codecInfoDepth4                = 0+(1 * (2**(2)));
  128.     codecInfoDepth8                = 0+(1 * (2**(3)));
  129.     codecInfoDepth16            = 0+(1 * (2**(4)));
  130.     codecInfoDepth32            = 0+(1 * (2**(5)));
  131.     codecInfoDepth24            = 0+(1 * (2**(6)));
  132.     codecInfoDepth33            = 0+(1 * (2**(7)));
  133.     codecInfoDepth34            = 0+(1 * (2**(8)));
  134.     codecInfoDepth36            = 0+(1 * (2**(9)));
  135.     codecInfoDepth40            = 0+(1 * (2**(10)));
  136.     codecInfoStoresClut            = 0+(1 * (2**(11)));
  137.     codecInfoDoesLossless        = 0+(1 * (2**(12)));
  138.     codecInfoSequenceSensitive    = 0+(1 * (2**(13)));
  139.  
  140.     codecFlagUseImageBuffer        = 0+(1 * (2**(0)));
  141.     codecFlagUseScreenBuffer    = 0+(1 * (2**(1)));
  142.     codecFlagUpdatePrevious        = 0+(1 * (2**(2)));
  143.     codecFlagNoScreenUpdate        = 0+(1 * (2**(3)));
  144.     codecFlagWasCompressed        = 0+(1 * (2**(4)));
  145.     codecFlagDontOffscreen        = 0+(1 * (2**(5)));
  146.     codecFlagUpdatePreviousComp    = 0+(1 * (2**(6)));
  147.     codecFlagForceKeyFrame        = 0+(1 * (2**(7)));
  148.     codecFlagOnlyScreenUpdate    = 0+(1 * (2**(8)));
  149.     codecFlagLiveGrab            = 0+(1 * (2**(9)));
  150.     codecFlagDontUseNewImageBuffer = 0+(1 * (2**(10)));
  151.     codecFlagInterlaceUpdate    = 0+(1 * (2**(11)));
  152.     codecFlagCatchUpDiff        = 0+(1 * (2**(12)));
  153.     codecFlagUsedNewImageBuffer    = 0+(1 * (2**(14)));
  154.     codecFlagUsedImageBuffer    = 0+(1 * (2**(15)));
  155.  
  156. { The minimum data size for spooling in or out data }
  157.     codecMinimumDataSize        = 32768;
  158.  
  159.     compressorComponentType        = 'imco';                        { the type for "Components" which compress images }
  160.     decompressorComponentType    = 'imdc';
  161.  
  162.     
  163. TYPE
  164.     CompressorComponent = Component;
  165.  
  166.     DecompressorComponent = Component;
  167.  
  168.     CodecComponent = Component;
  169.  
  170.  
  171. CONST
  172.     anyCodec                    = 0;                            { take first working codec of given type }
  173.     bestSpeedCodec                = -1;                            { take fastest codec of given type }
  174.     bestFidelityCodec            = -2;                            { take codec which is most accurate }
  175.     bestCompressionCodec        = -3;                            { take codec of given type that is most accurate }
  176.  
  177.     
  178. TYPE
  179.     CodecType = LONGINT;
  180.  
  181.     CodecFlags = INTEGER;
  182.  
  183.     CodecQ = LONGINT;
  184.  
  185.  
  186. CONST
  187.     codecLosslessQuality        = $400;
  188.     codecMaxQuality                = $3ff;
  189.     codecMinQuality                = $000;
  190.     codecLowQuality                = $100;
  191.     codecNormalQuality            = $200;
  192.     codecHighQuality            = $300;
  193.  
  194.     codecCompletionSource        = 0+(1 * (2**(0)));                { asynchronous codec is done with source data }
  195.     codecCompletionDest            = 0+(1 * (2**(1)));                { asynchronous codec is done with destination data }
  196.  
  197.     codecProgressOpen            = 0;
  198.     codecProgressUpdatePercent    = 1;
  199.     codecProgressClose            = 2;
  200.  
  201. TYPE
  202.     ICMDataProcPtr = ProcPtr;  { FUNCTION ICMData(VAR dataP: Ptr; bytesNeeded: LONGINT; refcon: LONGINT): OSErr; }
  203.     ICMFlushProcPtr = ProcPtr;  { FUNCTION ICMFlush(data: Ptr; bytesAdded: LONGINT; refcon: LONGINT): OSErr; }
  204.     ICMCompletionProcPtr = ProcPtr;  { PROCEDURE ICMCompletion(result: OSErr; flags: INTEGER; refcon: LONGINT); }
  205.     ICMProgressProcPtr = ProcPtr;  { FUNCTION ICMProgress(message: INTEGER; completeness: Fixed; refcon: LONGINT): OSErr; }
  206.     StdPixProcPtr = ProcPtr;  { PROCEDURE StdPix(VAR src: PixMap; VAR srcRect: Rect; VAR matrix: MatrixRecord; mode: INTEGER; mask: RgnHandle; VAR matte: PixMap; VAR matteRect: Rect; flags: INTEGER); }
  207.     ICMAlignmentProcPtr = ProcPtr;  { PROCEDURE ICMAlignment(VAR rp: Rect; refcon: LONGINT); }
  208.     ICMDataUPP = UniversalProcPtr;
  209.     ICMFlushUPP = UniversalProcPtr;
  210.     ICMCompletionUPP = UniversalProcPtr;
  211.     ICMProgressUPP = UniversalProcPtr;
  212.     StdPixUPP = UniversalProcPtr;
  213.     ICMAlignmentUPP = UniversalProcPtr;
  214.  
  215.     ImageSequence = LONGINT;
  216.  
  217.     ICMProgressProcRecord = RECORD
  218.         progressProc:            ICMProgressUPP;
  219.         progressRefCon:            LONGINT;
  220.     END;
  221.  
  222.     ICMProgressProcRecordPtr = ^ICMProgressProcRecord;
  223.  
  224.     ICMCompletionProcRecord = RECORD
  225.         completionProc:            ICMCompletionUPP;
  226.         completionRefCon:        LONGINT;
  227.     END;
  228.  
  229.     ICMCompletionProcRecordPtr = ^ICMCompletionProcRecord;
  230.  
  231.     ICMDataProcRecord = RECORD
  232.         dataProc:                ICMDataUPP;
  233.         dataRefCon:                LONGINT;
  234.     END;
  235.  
  236.     ICMDataProcRecordPtr = ^ICMDataProcRecord;
  237.  
  238.     ICMFlushProcRecord = RECORD
  239.         flushProc:                ICMFlushUPP;
  240.         flushRefCon:            LONGINT;
  241.     END;
  242.  
  243.     ICMFlushProcRecordPtr = ^ICMFlushProcRecord;
  244.  
  245.     ICMAlignmentProcRecord = RECORD
  246.         alignmentProc:            ICMAlignmentUPP;
  247.         alignmentRefCon:        LONGINT;
  248.     END;
  249.  
  250.     ICMAlignmentProcRecordPtr = ^ICMAlignmentProcRecord;
  251.  
  252.     DataRateParams = RECORD
  253.         dataRate:                LONGINT;
  254.         dataOverrun:            LONGINT;
  255.         frameDuration:            LONGINT;
  256.         keyFrameRate:            LONGINT;
  257.         minSpatialQuality:        CodecQ;
  258.         minTemporalQuality:        CodecQ;
  259.     END;
  260.  
  261.     DataRateParamsPtr = ^DataRateParams;
  262.  
  263.     ImageDescription = PACKED RECORD
  264.         idSize:                    LONGINT;                                { total size of ImageDescription including extra data ( CLUTs and other per sequence data }
  265.         cType:                    CodecType;                                { what kind of codec compressed this data }
  266.         resvd1:                    LONGINT;                                { reserved for Apple use }
  267.         resvd2:                    INTEGER;                                { reserved for Apple use }
  268.         dataRefIndex:            INTEGER;                                { set to zero  }
  269.         version:                INTEGER;                                { which version is this data }
  270.         revisionLevel:            INTEGER;                                { what version of that codec did this }
  271.         vendor:                    LONGINT;                                { whose  codec compressed this data }
  272.         temporalQuality:        CodecQ;                                    { what was the temporal quality factor  }
  273.         spatialQuality:            CodecQ;                                    { what was the spatial quality factor }
  274.         width:                    INTEGER;                                { how many pixels wide is this data }
  275.         height:                    INTEGER;                                { how many pixels high is this data }
  276.         hRes:                    Fixed;                                    { horizontal resolution }
  277.         vRes:                    Fixed;                                    { vertical resolution }
  278.         dataSize:                LONGINT;                                { if known, the size of data for this image descriptor }
  279.         frameCount:                INTEGER;                                { number of frames this description applies to }
  280.         name:                    Str31;                                    { name of codec ( in case not installed )  }
  281.         depth:                    INTEGER;                                { what depth is this data (1-32) or ( 33-40 grayscale ) }
  282.         clutID:                    INTEGER;                                { clut id or if 0 clut follows  or -1 if no clut }
  283.     END;
  284.  
  285.     ImageDescriptionPtr = ^ImageDescription;
  286.     ImageDescriptionHandle = ^ImageDescriptionPtr;
  287.  
  288.     CodecInfo = PACKED RECORD
  289.         typeName:                Str31;                                    { name of the codec type i.e.: 'Apple Image Compression' }
  290.         version:                INTEGER;                                { version of the codec data that this codec knows about }
  291.         revisionLevel:            INTEGER;                                { revision level of this codec i.e: 0x00010001 (1.0.1) }
  292.         vendor:                    LONGINT;                                { Maker of this codec i.e: 'appl' }
  293.         decompressFlags:        LONGINT;                                { codecInfo flags for decompression capabilities }
  294.         compressFlags:            LONGINT;                                { codecInfo flags for compression capabilities }
  295.         formatFlags:            LONGINT;                                { codecInfo flags for compression format details }
  296.         compressionAccuracy:    UInt8;                                    { measure (1-255) of accuracy of this codec for compress (0 if unknown) }
  297.         decompressionAccuracy:    UInt8;                                    { measure (1-255) of accuracy of this codec for decompress (0 if unknown) }
  298.         compressionSpeed:        INTEGER;                                { ( millisecs for compressing 320x240 on base mac II) (0 if unknown)  }
  299.         decompressionSpeed:        INTEGER;                                { ( millisecs for decompressing 320x240 on mac II)(0 if unknown)  }
  300.         compressionLevel:        UInt8;                                    { measure (1-255) of compression level of this codec (0 if unknown)  }
  301.         resvd:                    UInt8;                                    { pad }
  302.         minimumHeight:            INTEGER;                                { minimum height of image (block size) }
  303.         minimumWidth:            INTEGER;                                { minimum width of image (block size) }
  304.         decompressPipelineLatency: INTEGER;                                { in milliseconds ( for asynchronous codecs ) }
  305.         compressPipelineLatency: INTEGER;                                { in milliseconds ( for asynchronous codecs ) }
  306.         privateData:            LONGINT;
  307.     END;
  308.  
  309.     CodecNameSpec = RECORD
  310.         codec:                    CodecComponent;
  311.         cType:                    CodecType;
  312.         typeName:                Str31;
  313.         name:                    Handle;
  314.     END;
  315.  
  316.     CodecNameSpecList = RECORD
  317.         count:                    INTEGER;
  318.         list:                    ARRAY [0..0] OF CodecNameSpec;
  319.     END;
  320.  
  321.     CodecNameSpecListPtr = ^CodecNameSpecList;
  322.  
  323.  
  324. CONST
  325.     defaultDither                = 0;
  326.     forceDither                    = 1;
  327.     suppressDither                = 2;
  328.     useColorMatching            = 4;
  329.  
  330.  
  331. TYPE
  332.     ICMFrameTimeRecord = RECORD
  333.         value:                    wide;                                    { frame time}
  334.         scale:                    LONGINT;                                { timescale of value/duration fields}
  335.         base:                    Ptr;                                    { timebase}
  336.         duration:                LONGINT;                                { duration frame is to be displayed (0 if unknown)}
  337.         rate:                    Fixed;                                    { rate of timebase relative to wall-time}
  338.     END;
  339.  
  340.     ICMFrameTimePtr = ^ICMFrameTimeRecord;
  341.  
  342.  
  343. CONST
  344.     uppICMDataProcInfo = $00000FE0; { FUNCTION (4 byte param, 4 byte param, 4 byte param): 2 byte result; }
  345.     uppICMFlushProcInfo = $00000FE0; { FUNCTION (4 byte param, 4 byte param, 4 byte param): 2 byte result; }
  346.     uppICMCompletionProcInfo = $00000E80; { PROCEDURE (2 byte param, 2 byte param, 4 byte param); }
  347.     uppICMProgressProcInfo = $00000FA0; { FUNCTION (2 byte param, 4 byte param, 4 byte param): 2 byte result; }
  348.     uppStdPixProcInfo = $002FEFC0; { PROCEDURE (4 byte param, 4 byte param, 4 byte param, 2 byte param, 4 byte param, 4 byte param, 4 byte param, 2 byte param); }
  349.     uppICMAlignmentProcInfo = $000003C0; { PROCEDURE (4 byte param, 4 byte param); }
  350.  
  351. FUNCTION NewICMDataProc(userRoutine: ICMDataProcPtr): ICMDataUPP;
  352.     {$IFC NOT GENERATINGCFM }
  353.     INLINE $2E9F;
  354.     {$ENDC}
  355.  
  356. FUNCTION NewICMFlushProc(userRoutine: ICMFlushProcPtr): ICMFlushUPP;
  357.     {$IFC NOT GENERATINGCFM }
  358.     INLINE $2E9F;
  359.     {$ENDC}
  360.  
  361. FUNCTION NewICMCompletionProc(userRoutine: ICMCompletionProcPtr): ICMCompletionUPP;
  362.     {$IFC NOT GENERATINGCFM }
  363.     INLINE $2E9F;
  364.     {$ENDC}
  365.  
  366. FUNCTION NewICMProgressProc(userRoutine: ICMProgressProcPtr): ICMProgressUPP;
  367.     {$IFC NOT GENERATINGCFM }
  368.     INLINE $2E9F;
  369.     {$ENDC}
  370.  
  371. FUNCTION NewStdPixProc(userRoutine: StdPixProcPtr): StdPixUPP;
  372.     {$IFC NOT GENERATINGCFM }
  373.     INLINE $2E9F;
  374.     {$ENDC}
  375.  
  376. FUNCTION NewICMAlignmentProc(userRoutine: ICMAlignmentProcPtr): ICMAlignmentUPP;
  377.     {$IFC NOT GENERATINGCFM }
  378.     INLINE $2E9F;
  379.     {$ENDC}
  380.  
  381. FUNCTION CallICMDataProc(VAR dataP: Ptr; bytesNeeded: LONGINT; refcon: LONGINT; userRoutine: ICMDataUPP): OSErr;
  382.     {$IFC NOT GENERATINGCFM}
  383.     INLINE $205F, $4E90;
  384.     {$ENDC}
  385.  
  386. FUNCTION CallICMFlushProc(data: Ptr; bytesAdded: LONGINT; refcon: LONGINT; userRoutine: ICMFlushUPP): OSErr;
  387.     {$IFC NOT GENERATINGCFM}
  388.     INLINE $205F, $4E90;
  389.     {$ENDC}
  390.  
  391. PROCEDURE CallICMCompletionProc(result: OSErr; flags: INTEGER; refcon: LONGINT; userRoutine: ICMCompletionUPP);
  392.     {$IFC NOT GENERATINGCFM}
  393.     INLINE $205F, $4E90;
  394.     {$ENDC}
  395.  
  396. FUNCTION CallICMProgressProc(message: INTEGER; completeness: Fixed; refcon: LONGINT; userRoutine: ICMProgressUPP): OSErr;
  397.     {$IFC NOT GENERATINGCFM}
  398.     INLINE $205F, $4E90;
  399.     {$ENDC}
  400.  
  401. PROCEDURE CallStdPixProc(VAR src: PixMap; VAR srcRect: Rect; VAR matrix: MatrixRecord; mode: INTEGER; mask: RgnHandle; VAR matte: PixMap; VAR matteRect: Rect; flags: INTEGER; userRoutine: StdPixUPP);
  402.     {$IFC NOT GENERATINGCFM}
  403.     INLINE $205F, $4E90;
  404.     {$ENDC}
  405.  
  406. PROCEDURE CallICMAlignmentProc(VAR rp: Rect; refcon: LONGINT; userRoutine: ICMAlignmentUPP);
  407.     {$IFC NOT GENERATINGCFM}
  408.     INLINE $205F, $4E90;
  409.     {$ENDC}
  410.  
  411. FUNCTION CodecManagerVersion(VAR version: LONGINT): OSErr;
  412.     {$IFC NOT GENERATINGCFM}
  413.     INLINE $7000, $AAA3;
  414.     {$ENDC}
  415. FUNCTION GetCodecNameList(VAR list: CodecNameSpecListPtr; showAll: INTEGER): OSErr;
  416.     {$IFC NOT GENERATINGCFM}
  417.     INLINE $7001, $AAA3;
  418.     {$ENDC}
  419. FUNCTION DisposeCodecNameList(list: CodecNameSpecListPtr): OSErr;
  420.     {$IFC NOT GENERATINGCFM}
  421.     INLINE $700F, $AAA3;
  422.     {$ENDC}
  423. FUNCTION GetCodecInfo(VAR info: CodecInfo; cType: CodecType; codec: CodecComponent): OSErr;
  424.     {$IFC NOT GENERATINGCFM}
  425.     INLINE $7003, $AAA3;
  426.     {$ENDC}
  427. FUNCTION GetMaxCompressionSize(src: PixMapHandle; {CONST}VAR srcRect: Rect; colorDepth: INTEGER; quality: CodecQ; cType: CodecType; codec: CompressorComponent; VAR size: LONGINT): OSErr;
  428.     {$IFC NOT GENERATINGCFM}
  429.     INLINE $7004, $AAA3;
  430.     {$ENDC}
  431. FUNCTION GetCompressionTime(src: PixMapHandle; {CONST}VAR srcRect: Rect; colorDepth: INTEGER; cType: CodecType; codec: CompressorComponent; VAR spatialQuality: CodecQ; VAR temporalQuality: CodecQ; VAR compressTime: LONGINT): OSErr;
  432.     {$IFC NOT GENERATINGCFM}
  433.     INLINE $7005, $AAA3;
  434.     {$ENDC}
  435. FUNCTION CompressImage(src: PixMapHandle; {CONST}VAR srcRect: Rect; quality: CodecQ; cType: CodecType; desc: ImageDescriptionHandle; data: Ptr): OSErr;
  436.     {$IFC NOT GENERATINGCFM}
  437.     INLINE $7006, $AAA3;
  438.     {$ENDC}
  439. FUNCTION FCompressImage(src: PixMapHandle; {CONST}VAR srcRect: Rect; colorDepth: INTEGER; quality: CodecQ; cType: CodecType; codec: CompressorComponent; clut: CTabHandle; flags: CodecFlags; bufferSize: LONGINT; flushProc: ICMFlushProcRecordPtr; progressProc: ICMProgressProcRecordPtr; desc: ImageDescriptionHandle; data: Ptr): OSErr;
  440.     {$IFC NOT GENERATINGCFM}
  441.     INLINE $7007, $AAA3;
  442.     {$ENDC}
  443. FUNCTION DecompressImage(data: Ptr; desc: ImageDescriptionHandle; dst: PixMapHandle; {CONST}VAR srcRect: Rect; {CONST}VAR dstRect: Rect; mode: INTEGER; mask: RgnHandle): OSErr;
  444.     {$IFC NOT GENERATINGCFM}
  445.     INLINE $7008, $AAA3;
  446.     {$ENDC}
  447. FUNCTION FDecompressImage(data: Ptr; desc: ImageDescriptionHandle; dst: PixMapHandle; {CONST}VAR srcRect: Rect; matrix: MatrixRecordPtr; mode: INTEGER; mask: RgnHandle; matte: PixMapHandle; {CONST}VAR matteRect: Rect; accuracy: CodecQ; codec: DecompressorComponent; bufferSize: LONGINT; dataProc: ICMDataProcRecordPtr; progressProc: ICMProgressProcRecordPtr): OSErr;
  448.     {$IFC NOT GENERATINGCFM}
  449.     INLINE $7009, $AAA3;
  450.     {$ENDC}
  451. FUNCTION CompressSequenceBegin(VAR seqID: ImageSequence; src: PixMapHandle; prev: PixMapHandle; {CONST}VAR srcRect: Rect; {CONST}VAR prevRect: Rect; colorDepth: INTEGER; cType: CodecType; codec: CompressorComponent; spatialQuality: CodecQ; temporalQuality: CodecQ; keyFrameRate: LONGINT; clut: CTabHandle; flags: CodecFlags; desc: ImageDescriptionHandle): OSErr;
  452.     {$IFC NOT GENERATINGCFM}
  453.     INLINE $700A, $AAA3;
  454.     {$ENDC}
  455. FUNCTION CompressSequenceFrame(seqID: ImageSequence; src: PixMapHandle; {CONST}VAR srcRect: Rect; flags: CodecFlags; data: Ptr; VAR dataSize: LONGINT; VAR similarity: UInt8; asyncCompletionProc: ICMCompletionProcRecordPtr): OSErr;
  456.     {$IFC NOT GENERATINGCFM}
  457.     INLINE $700B, $AAA3;
  458.     {$ENDC}
  459. FUNCTION DecompressSequenceBegin(VAR seqID: ImageSequence; desc: ImageDescriptionHandle; port: CGrafPtr; gdh: GDHandle; {CONST}VAR srcRect: Rect; matrix: MatrixRecordPtr; mode: INTEGER; mask: RgnHandle; flags: CodecFlags; accuracy: CodecQ; codec: DecompressorComponent): OSErr;
  460.     {$IFC NOT GENERATINGCFM}
  461.     INLINE $700D, $AAA3;
  462.     {$ENDC}
  463. FUNCTION DecompressSequenceBeginS(VAR seqID: ImageSequence; desc: ImageDescriptionHandle; data: Ptr; dataSize: LONGINT; port: CGrafPtr; gdh: GDHandle; {CONST}VAR srcRect: Rect; matrix: MatrixRecordPtr; mode: INTEGER; mask: RgnHandle; flags: CodecFlags; accuracy: CodecQ; codec: DecompressorComponent): OSErr;
  464.     {$IFC NOT GENERATINGCFM}
  465.     INLINE $203C, $30, $5D, $AAA3;
  466.     {$ENDC}
  467. FUNCTION DecompressSequenceFrame(seqID: ImageSequence; data: Ptr; inFlags: CodecFlags; VAR outFlags: CodecFlags; asyncCompletionProc: ICMCompletionProcRecordPtr): OSErr;
  468.     {$IFC NOT GENERATINGCFM}
  469.     INLINE $700E, $AAA3;
  470.     {$ENDC}
  471. FUNCTION DecompressSequenceFrameS(seqID: ImageSequence; data: Ptr; dataSize: LONGINT; inFlags: CodecFlags; VAR outFlags: CodecFlags; asyncCompletionProc: ICMCompletionProcRecordPtr): OSErr;
  472.     {$IFC NOT GENERATINGCFM}
  473.     INLINE $203C, $16, $47, $AAA3;
  474.     {$ENDC}
  475. FUNCTION DecompressSequenceFrameWhen(seqID: ImageSequence; data: Ptr; dataSize: LONGINT; inFlags: CodecFlags; VAR outFlags: CodecFlags; asyncCompletionProc: ICMCompletionProcRecordPtr; {CONST}VAR frameTime: ICMFrameTimeRecord): OSErr;
  476.     {$IFC NOT GENERATINGCFM}
  477.     INLINE $203C, $1A, $5E, $AAA3;
  478.     {$ENDC}
  479. FUNCTION CDSequenceFlush(seqID: ImageSequence): OSErr;
  480.     {$IFC NOT GENERATINGCFM}
  481.     INLINE $203C, $4, $5F, $AAA3;
  482.     {$ENDC}
  483. FUNCTION SetDSequenceMatrix(seqID: ImageSequence; matrix: MatrixRecordPtr): OSErr;
  484.     {$IFC NOT GENERATINGCFM}
  485.     INLINE $7010, $AAA3;
  486.     {$ENDC}
  487. FUNCTION SetDSequenceMatte(seqID: ImageSequence; matte: PixMapHandle; {CONST}VAR matteRect: Rect): OSErr;
  488.     {$IFC NOT GENERATINGCFM}
  489.     INLINE $7011, $AAA3;
  490.     {$ENDC}
  491. FUNCTION SetDSequenceMask(seqID: ImageSequence; mask: RgnHandle): OSErr;
  492.     {$IFC NOT GENERATINGCFM}
  493.     INLINE $7012, $AAA3;
  494.     {$ENDC}
  495. FUNCTION SetDSequenceTransferMode(seqID: ImageSequence; mode: INTEGER; {CONST}VAR opColor: RGBColor): OSErr;
  496.     {$IFC NOT GENERATINGCFM}
  497.     INLINE $7013, $AAA3;
  498.     {$ENDC}
  499. FUNCTION SetDSequenceDataProc(seqID: ImageSequence; dataProc: ICMDataProcRecordPtr; bufferSize: LONGINT): OSErr;
  500.     {$IFC NOT GENERATINGCFM}
  501.     INLINE $7014, $AAA3;
  502.     {$ENDC}
  503. FUNCTION SetDSequenceAccuracy(seqID: ImageSequence; accuracy: CodecQ): OSErr;
  504.     {$IFC NOT GENERATINGCFM}
  505.     INLINE $7034, $AAA3;
  506.     {$ENDC}
  507. FUNCTION SetDSequenceSrcRect(seqID: ImageSequence; {CONST}VAR srcRect: Rect): OSErr;
  508.     {$IFC NOT GENERATINGCFM}
  509.     INLINE $7035, $AAA3;
  510.     {$ENDC}
  511. FUNCTION GetDSequenceImageBuffer(seqID: ImageSequence; VAR gworld: GWorldPtr): OSErr;
  512.     {$IFC NOT GENERATINGCFM}
  513.     INLINE $7015, $AAA3;
  514.     {$ENDC}
  515. FUNCTION GetDSequenceScreenBuffer(seqID: ImageSequence; VAR gworld: GWorldPtr): OSErr;
  516.     {$IFC NOT GENERATINGCFM}
  517.     INLINE $7016, $AAA3;
  518.     {$ENDC}
  519. FUNCTION SetCSequenceQuality(seqID: ImageSequence; spatialQuality: CodecQ; temporalQuality: CodecQ): OSErr;
  520.     {$IFC NOT GENERATINGCFM}
  521.     INLINE $7017, $AAA3;
  522.     {$ENDC}
  523. FUNCTION SetCSequencePrev(seqID: ImageSequence; prev: PixMapHandle; {CONST}VAR prevRect: Rect): OSErr;
  524.     {$IFC NOT GENERATINGCFM}
  525.     INLINE $7018, $AAA3;
  526.     {$ENDC}
  527. FUNCTION SetCSequenceFlushProc(seqID: ImageSequence; flushProc: ICMFlushProcRecordPtr; bufferSize: LONGINT): OSErr;
  528.     {$IFC NOT GENERATINGCFM}
  529.     INLINE $7033, $AAA3;
  530.     {$ENDC}
  531. FUNCTION SetCSequenceKeyFrameRate(seqID: ImageSequence; keyframerate: LONGINT): OSErr;
  532.     {$IFC NOT GENERATINGCFM}
  533.     INLINE $7036, $AAA3;
  534.     {$ENDC}
  535. FUNCTION GetCSequenceKeyFrameRate(seqID: ImageSequence; VAR keyframerate: LONGINT): OSErr;
  536.     {$IFC NOT GENERATINGCFM}
  537.     INLINE $203C, $8, $4B, $AAA3;
  538.     {$ENDC}
  539. FUNCTION GetCSequencePrevBuffer(seqID: ImageSequence; VAR gworld: GWorldPtr): OSErr;
  540.     {$IFC NOT GENERATINGCFM}
  541.     INLINE $7019, $AAA3;
  542.     {$ENDC}
  543. FUNCTION CDSequenceBusy(seqID: ImageSequence): OSErr;
  544.     {$IFC NOT GENERATINGCFM}
  545.     INLINE $701A, $AAA3;
  546.     {$ENDC}
  547. FUNCTION CDSequenceEnd(seqID: ImageSequence): OSErr;
  548.     {$IFC NOT GENERATINGCFM}
  549.     INLINE $701B, $AAA3;
  550.     {$ENDC}
  551. FUNCTION GetCompressedImageSize(desc: ImageDescriptionHandle; data: Ptr; bufferSize: LONGINT; dataProc: ICMDataProcRecordPtr; VAR dataSize: LONGINT): OSErr;
  552.     {$IFC NOT GENERATINGCFM}
  553.     INLINE $701C, $AAA3;
  554.     {$ENDC}
  555. FUNCTION GetSimilarity(src: PixMapHandle; {CONST}VAR srcRect: Rect; desc: ImageDescriptionHandle; data: Ptr; VAR similarity: Fixed): OSErr;
  556.     {$IFC NOT GENERATINGCFM}
  557.     INLINE $701D, $AAA3;
  558.     {$ENDC}
  559. FUNCTION GetImageDescriptionCTable(desc: ImageDescriptionHandle; VAR ctable: CTabHandle): OSErr;
  560.     {$IFC NOT GENERATINGCFM}
  561.     INLINE $701E, $AAA3;
  562.     {$ENDC}
  563. FUNCTION SetImageDescriptionCTable(desc: ImageDescriptionHandle; ctable: CTabHandle): OSErr;
  564.     {$IFC NOT GENERATINGCFM}
  565.     INLINE $701F, $AAA3;
  566.     {$ENDC}
  567. FUNCTION GetImageDescriptionExtension(desc: ImageDescriptionHandle; VAR extension: Handle; idType: LONGINT; index: LONGINT): OSErr;
  568.     {$IFC NOT GENERATINGCFM}
  569.     INLINE $7020, $AAA3;
  570.     {$ENDC}
  571. FUNCTION SetImageDescriptionExtension(desc: ImageDescriptionHandle; extension: Handle; idType: LONGINT): OSErr;
  572.     {$IFC NOT GENERATINGCFM}
  573.     INLINE $7021, $AAA3;
  574.     {$ENDC}
  575. FUNCTION RemoveImageDescriptionExtension(VAR desc: ImageDescription; idType: LONGINT; index: LONGINT): OSErr;
  576.     {$IFC NOT GENERATINGCFM}
  577.     INLINE $203C, $C, $3A, $AAA3;
  578.     {$ENDC}
  579. FUNCTION CountImageDescriptionExtensionType(VAR desc: ImageDescription; idType: LONGINT; VAR count: LONGINT): OSErr;
  580.     {$IFC NOT GENERATINGCFM}
  581.     INLINE $203C, $C, $3B, $AAA3;
  582.     {$ENDC}
  583. FUNCTION GetNextImageDescriptionExtensionType(VAR desc: ImageDescription; VAR idType: LONGINT): OSErr;
  584.     {$IFC NOT GENERATINGCFM}
  585.     INLINE $203C, $8, $3C, $AAA3;
  586.     {$ENDC}
  587. FUNCTION FindCodec(cType: CodecType; specCodec: CodecComponent; VAR compressor: CompressorComponent; VAR decompressor: DecompressorComponent): OSErr;
  588.     {$IFC NOT GENERATINGCFM}
  589.     INLINE $7023, $AAA3;
  590.     {$ENDC}
  591. FUNCTION CompressPicture(srcPicture: PicHandle; dstPicture: PicHandle; quality: CodecQ; cType: CodecType): OSErr;
  592.     {$IFC NOT GENERATINGCFM}
  593.     INLINE $7024, $AAA3;
  594.     {$ENDC}
  595. FUNCTION FCompressPicture(srcPicture: PicHandle; dstPicture: PicHandle; colorDepth: INTEGER; clut: CTabHandle; quality: CodecQ; doDither: INTEGER; compressAgain: INTEGER; progressProc: ICMProgressProcRecordPtr; cType: CodecType; codec: CompressorComponent): OSErr;
  596.     {$IFC NOT GENERATINGCFM}
  597.     INLINE $7025, $AAA3;
  598.     {$ENDC}
  599. FUNCTION CompressPictureFile(srcRefNum: INTEGER; dstRefNum: INTEGER; quality: CodecQ; cType: CodecType): OSErr;
  600.     {$IFC NOT GENERATINGCFM}
  601.     INLINE $7026, $AAA3;
  602.     {$ENDC}
  603. FUNCTION FCompressPictureFile(srcRefNum: INTEGER; dstRefNum: INTEGER; colorDepth: INTEGER; clut: CTabHandle; quality: CodecQ; doDither: INTEGER; compressAgain: INTEGER; progressProc: ICMProgressProcRecordPtr; cType: CodecType; codec: CompressorComponent): OSErr;
  604.     {$IFC NOT GENERATINGCFM}
  605.     INLINE $7027, $AAA3;
  606.     {$ENDC}
  607. FUNCTION GetPictureFileHeader(refNum: INTEGER; VAR frame: Rect; VAR header: OpenCPicParams): OSErr;
  608.     {$IFC NOT GENERATINGCFM}
  609.     INLINE $7028, $AAA3;
  610.     {$ENDC}
  611. FUNCTION DrawPictureFile(refNum: INTEGER; {CONST}VAR frame: Rect; progressProc: ICMProgressProcRecordPtr): OSErr;
  612.     {$IFC NOT GENERATINGCFM}
  613.     INLINE $7029, $AAA3;
  614.     {$ENDC}
  615. FUNCTION DrawTrimmedPicture(srcPicture: PicHandle; {CONST}VAR frame: Rect; trimMask: RgnHandle; doDither: INTEGER; progressProc: ICMProgressProcRecordPtr): OSErr;
  616.     {$IFC NOT GENERATINGCFM}
  617.     INLINE $702E, $AAA3;
  618.     {$ENDC}
  619. FUNCTION DrawTrimmedPictureFile(srcRefnum: INTEGER; {CONST}VAR frame: Rect; trimMask: RgnHandle; doDither: INTEGER; progressProc: ICMProgressProcRecordPtr): OSErr;
  620.     {$IFC NOT GENERATINGCFM}
  621.     INLINE $702F, $AAA3;
  622.     {$ENDC}
  623. FUNCTION MakeThumbnailFromPicture(picture: PicHandle; colorDepth: INTEGER; thumbnail: PicHandle; progressProc: ICMProgressProcRecordPtr): OSErr;
  624.     {$IFC NOT GENERATINGCFM}
  625.     INLINE $702A, $AAA3;
  626.     {$ENDC}
  627. FUNCTION MakeThumbnailFromPictureFile(refNum: INTEGER; colorDepth: INTEGER; thumbnail: PicHandle; progressProc: ICMProgressProcRecordPtr): OSErr;
  628.     {$IFC NOT GENERATINGCFM}
  629.     INLINE $702B, $AAA3;
  630.     {$ENDC}
  631. FUNCTION MakeThumbnailFromPixMap(src: PixMapHandle; {CONST}VAR srcRect: Rect; colorDepth: INTEGER; thumbnail: PicHandle; progressProc: ICMProgressProcRecordPtr): OSErr;
  632.     {$IFC NOT GENERATINGCFM}
  633.     INLINE $702C, $AAA3;
  634.     {$ENDC}
  635. FUNCTION TrimImage(desc: ImageDescriptionHandle; inData: Ptr; inBufferSize: LONGINT; dataProc: ICMDataProcRecordPtr; outData: Ptr; outBufferSize: LONGINT; flushProc: ICMFlushProcRecordPtr; VAR trimRect: Rect; progressProc: ICMProgressProcRecordPtr): OSErr;
  636.     {$IFC NOT GENERATINGCFM}
  637.     INLINE $702D, $AAA3;
  638.     {$ENDC}
  639. FUNCTION ConvertImage(srcDD: ImageDescriptionHandle; srcData: Ptr; colorDepth: INTEGER; clut: CTabHandle; accuracy: CodecQ; quality: CodecQ; cType: CodecType; codec: CodecComponent; dstDD: ImageDescriptionHandle; dstData: Ptr): OSErr;
  640.     {$IFC NOT GENERATINGCFM}
  641.     INLINE $7030, $AAA3;
  642.     {$ENDC}
  643. FUNCTION GetCompressedPixMapInfo(pix: PixMapPtr; VAR desc: ImageDescriptionHandle; VAR data: Ptr; VAR bufferSize: LONGINT; VAR dataProc: ICMDataProcRecord; VAR progressProc: ICMProgressProcRecord): OSErr;
  644.     {$IFC NOT GENERATINGCFM}
  645.     INLINE $7037, $AAA3;
  646.     {$ENDC}
  647. FUNCTION SetCompressedPixMapInfo(pix: PixMapPtr; desc: ImageDescriptionHandle; data: Ptr; bufferSize: LONGINT; dataProc: ICMDataProcRecordPtr; progressProc: ICMProgressProcRecordPtr): OSErr;
  648.     {$IFC NOT GENERATINGCFM}
  649.     INLINE $7038, $AAA3;
  650.     {$ENDC}
  651. PROCEDURE StdPix(src: PixMapPtr; {CONST}VAR srcRect: Rect; matrix: MatrixRecordPtr; mode: INTEGER; mask: RgnHandle; matte: PixMapPtr; {CONST}VAR matteRect: Rect; flags: INTEGER);
  652.     {$IFC NOT GENERATINGCFM}
  653.     INLINE $700C, $AAA3;
  654.     {$ENDC}
  655. FUNCTION TransformRgn(matrix: MatrixRecordPtr; rgn: RgnHandle): OSErr;
  656.     {$IFC NOT GENERATINGCFM}
  657.     INLINE $7039, $AAA3;
  658.     {$ENDC}
  659. {**********
  660.     preview stuff
  661. **********}
  662. PROCEDURE SFGetFilePreview(where: Point; prompt: ConstStr255Param; fileFilter: FileFilterUPP; numTypes: INTEGER; typeList: ConstSFTypeListPtr; dlgHook: DlgHookUPP; VAR reply: SFReply);
  663.     {$IFC NOT GENERATINGCFM}
  664.     INLINE $7041, $AAA3;
  665.     {$ENDC}
  666. PROCEDURE SFPGetFilePreview(where: Point; prompt: ConstStr255Param; fileFilter: FileFilterUPP; numTypes: INTEGER; typeList: ConstSFTypeListPtr; dlgHook: DlgHookUPP; VAR reply: SFReply; dlgID: INTEGER; filterProc: ModalFilterUPP);
  667.     {$IFC NOT GENERATINGCFM}
  668.     INLINE $7042, $AAA3;
  669.     {$ENDC}
  670. PROCEDURE StandardGetFilePreview(fileFilter: FileFilterUPP; numTypes: INTEGER; typeList: ConstSFTypeListPtr; VAR reply: StandardFileReply);
  671.     {$IFC NOT GENERATINGCFM}
  672.     INLINE $7043, $AAA3;
  673.     {$ENDC}
  674. PROCEDURE CustomGetFilePreview(fileFilter: FileFilterYDUPP; numTypes: INTEGER; typeList: ConstSFTypeListPtr; VAR reply: StandardFileReply; dlgID: INTEGER; where: Point; dlgHook: DlgHookYDUPP; filterProc: ModalFilterYDUPP; activeList: ActivationOrderListPtr; activateProc: ActivateYDUPP; yourDataPtr: UNIV Ptr);
  675.     {$IFC NOT GENERATINGCFM}
  676.     INLINE $7044, $AAA3;
  677.     {$ENDC}
  678. FUNCTION MakeFilePreview(resRefNum: INTEGER; progress: ICMProgressProcRecordPtr): OSErr;
  679.     {$IFC NOT GENERATINGCFM}
  680.     INLINE $7045, $AAA3;
  681.     {$ENDC}
  682. FUNCTION AddFilePreview(resRefNum: INTEGER; previewType: OSType; previewData: Handle): OSErr;
  683.     {$IFC NOT GENERATINGCFM}
  684.     INLINE $7046, $AAA3;
  685.     {$ENDC}
  686.  
  687. CONST
  688.     sfpItemPreviewAreaUser        = 11;
  689.     sfpItemPreviewStaticText    = 12;
  690.     sfpItemPreviewDividerUser    = 13;
  691.     sfpItemCreatePreviewButton    = 14;
  692.     sfpItemShowPreviewButton    = 15;
  693.  
  694.  
  695. TYPE
  696.     PreviewResourceRecord = RECORD
  697.         modDate:                LONGINT;
  698.         version:                INTEGER;
  699.         resType:                OSType;
  700.         resID:                    INTEGER;
  701.     END;
  702.  
  703.     PreviewResourcePtr = ^PreviewResourceRecord;
  704.     PreviewResource = ^PreviewResourcePtr;
  705.  
  706.  
  707. PROCEDURE AlignScreenRect(VAR rp: Rect; alignmentProc: ICMAlignmentProcRecordPtr);
  708.     {$IFC NOT GENERATINGCFM}
  709.     INLINE $203C, $8, $4C, $AAA3;
  710.     {$ENDC}
  711. PROCEDURE AlignWindow(wp: WindowPtr; front: BOOLEAN; {CONST}VAR alignmentRect: Rect; alignmentProc: ICMAlignmentProcRecordPtr);
  712.     {$IFC NOT GENERATINGCFM}
  713.     INLINE $203C, $E, $4D, $AAA3;
  714.     {$ENDC}
  715. PROCEDURE DragAlignedWindow(wp: WindowPtr; startPt: Point; VAR boundsRect: Rect; VAR alignmentRect: Rect; alignmentProc: ICMAlignmentProcRecordPtr);
  716.     {$IFC NOT GENERATINGCFM}
  717.     INLINE $203C, $14, $4E, $AAA3;
  718.     {$ENDC}
  719. FUNCTION DragAlignedGrayRgn(theRgn: RgnHandle; startPt: Point; VAR boundsRect: Rect; VAR slopRect: Rect; axis: INTEGER; actionProc: UniversalProcPtr; VAR alignmentRect: Rect; alignmentProc: ICMAlignmentProcRecordPtr): LONGINT;
  720.     {$IFC NOT GENERATINGCFM}
  721.     INLINE $203C, $1E, $4F, $AAA3;
  722.     {$ENDC}
  723. FUNCTION SetCSequenceDataRateParams(seqID: ImageSequence; params: DataRateParamsPtr): OSErr;
  724.     {$IFC NOT GENERATINGCFM}
  725.     INLINE $203C, $8, $50, $AAA3;
  726.     {$ENDC}
  727. FUNCTION SetCSequenceFrameNumber(seqID: ImageSequence; frameNumber: LONGINT): OSErr;
  728.     {$IFC NOT GENERATINGCFM}
  729.     INLINE $203C, $8, $51, $AAA3;
  730.     {$ENDC}
  731. FUNCTION NewImageGWorld(VAR gworld: GWorldPtr; idh: ImageDescriptionHandle; flags: GWorldFlags): QDErr;
  732.     {$IFC NOT GENERATINGCFM}
  733.     INLINE $203C, $C, $52, $AAA3;
  734.     {$ENDC}
  735. FUNCTION GetCSequenceDataRateParams(seqID: ImageSequence; params: DataRateParamsPtr): OSErr;
  736.     {$IFC NOT GENERATINGCFM}
  737.     INLINE $203C, $8, $53, $AAA3;
  738.     {$ENDC}
  739. FUNCTION GetCSequenceFrameNumber(seqID: ImageSequence; VAR frameNumber: LONGINT): OSErr;
  740.     {$IFC NOT GENERATINGCFM}
  741.     INLINE $203C, $8, $54, $AAA3;
  742.     {$ENDC}
  743. FUNCTION GetBestDeviceRect(VAR gdh: GDHandle; VAR rp: Rect): OSErr;
  744.     {$IFC NOT GENERATINGCFM}
  745.     INLINE $203C, $8, $55, $AAA3;
  746.     {$ENDC}
  747. FUNCTION SetSequenceProgressProc(seqID: ImageSequence; VAR progressProc: ICMProgressProcRecord): OSErr;
  748.     {$IFC NOT GENERATINGCFM}
  749.     INLINE $203C, $8, $56, $AAA3;
  750.     {$ENDC}
  751. FUNCTION GDHasScale(gdh: GDHandle; depth: INTEGER; VAR scale: Fixed): OSErr;
  752.     {$IFC NOT GENERATINGCFM}
  753.     INLINE $203C, $A, $5A, $AAA3;
  754.     {$ENDC}
  755. FUNCTION GDGetScale(gdh: GDHandle; VAR scale: Fixed; VAR flags: INTEGER): OSErr;
  756.     {$IFC NOT GENERATINGCFM}
  757.     INLINE $203C, $C, $5B, $AAA3;
  758.     {$ENDC}
  759. FUNCTION GDSetScale(gdh: GDHandle; scale: Fixed; flags: INTEGER): OSErr;
  760.     {$IFC NOT GENERATINGCFM}
  761.     INLINE $203C, $A, $5C, $AAA3;
  762.     {$ENDC}
  763. FUNCTION ICMShieldSequenceCursor(seqID: ImageSequence): OSErr;
  764.     {$IFC NOT GENERATINGCFM}
  765.     INLINE $203C, $4, $62, $AAA3;
  766.     {$ENDC}
  767. PROCEDURE ICMDecompressComplete(seqID: ImageSequence; err: OSErr; flag: INTEGER; completionRtn: ICMCompletionProcRecordPtr);
  768.     {$IFC NOT GENERATINGCFM}
  769.     INLINE $203C, $C, $63, $AAA3;
  770.     {$ENDC}
  771. FUNCTION SetDSequenceTimeCode(seqID: ImageSequence; timeCodeFormat: UNIV Ptr; timeCodeTime: UNIV Ptr): OSErr;
  772.     {$IFC NOT GENERATINGCFM}
  773.     INLINE $203C, $C, $64, $AAA3;
  774.     {$ENDC}
  775.  
  776. CONST
  777.     identityMatrixType            = $00;                            { result if matrix is identity }
  778.     translateMatrixType            = $01;                            { result if matrix translates }
  779.     scaleMatrixType                = $02;                            { result if matrix scales }
  780.     scaleTranslateMatrixType    = $03;                            { result if matrix scales and translates }
  781.     linearMatrixType            = $04;                            { result if matrix is general 2 x 2 }
  782.     linearTranslateMatrixType    = $05;                            { result if matrix is general 2 x 2 and translates }
  783.     perspectiveMatrixType        = $06;                            { result if matrix is general 3 x 3 }
  784.  
  785.     
  786. TYPE
  787.     MatrixFlags = INTEGER;
  788.  
  789.  
  790. FUNCTION GetMatrixType({CONST}VAR m: MatrixRecord): INTEGER;
  791.     {$IFC NOT GENERATINGCFM}
  792.     INLINE $7014, $ABC2;
  793.     {$ENDC}
  794. PROCEDURE CopyMatrix({CONST}VAR m1: MatrixRecord; VAR m2: MatrixRecord);
  795.     {$IFC NOT GENERATINGCFM}
  796.     INLINE $7020, $ABC2;
  797.     {$ENDC}
  798. FUNCTION EqualMatrix({CONST}VAR m1: MatrixRecord; {CONST}VAR m2: MatrixRecord): BOOLEAN;
  799.     {$IFC NOT GENERATINGCFM}
  800.     INLINE $7021, $ABC2;
  801.     {$ENDC}
  802. PROCEDURE SetIdentityMatrix(VAR matrix: MatrixRecord);
  803.     {$IFC NOT GENERATINGCFM}
  804.     INLINE $7015, $ABC2;
  805.     {$ENDC}
  806. PROCEDURE TranslateMatrix(VAR m: MatrixRecord; deltaH: Fixed; deltaV: Fixed);
  807.     {$IFC NOT GENERATINGCFM}
  808.     INLINE $7019, $ABC2;
  809.     {$ENDC}
  810. PROCEDURE RotateMatrix(VAR m: MatrixRecord; degrees: Fixed; aboutX: Fixed; aboutY: Fixed);
  811.     {$IFC NOT GENERATINGCFM}
  812.     INLINE $7016, $ABC2;
  813.     {$ENDC}
  814. PROCEDURE ScaleMatrix(VAR m: MatrixRecord; scaleX: Fixed; scaleY: Fixed; aboutX: Fixed; aboutY: Fixed);
  815.     {$IFC NOT GENERATINGCFM}
  816.     INLINE $7017, $ABC2;
  817.     {$ENDC}
  818. PROCEDURE SkewMatrix(VAR m: MatrixRecord; skewX: Fixed; skewY: Fixed; aboutX: Fixed; aboutY: Fixed);
  819.     {$IFC NOT GENERATINGCFM}
  820.     INLINE $7018, $ABC2;
  821.     {$ENDC}
  822. FUNCTION TransformFixedPoints({CONST}VAR m: MatrixRecord; VAR fpt: FixedPoint; count: LONGINT): OSErr;
  823.     {$IFC NOT GENERATINGCFM}
  824.     INLINE $7022, $ABC2;
  825.     {$ENDC}
  826. FUNCTION TransformPoints({CONST}VAR mp: MatrixRecord; VAR pt1: Point; count: LONGINT): OSErr;
  827.     {$IFC NOT GENERATINGCFM}
  828.     INLINE $7023, $ABC2;
  829.     {$ENDC}
  830. FUNCTION TransformFixedRect({CONST}VAR m: MatrixRecord; VAR fr: FixedRect; VAR fpp: FixedPoint): BOOLEAN;
  831.     {$IFC NOT GENERATINGCFM}
  832.     INLINE $7024, $ABC2;
  833.     {$ENDC}
  834. FUNCTION TransformRect({CONST}VAR m: MatrixRecord; VAR r: Rect; VAR fpp: FixedPoint): BOOLEAN;
  835.     {$IFC NOT GENERATINGCFM}
  836.     INLINE $7025, $ABC2;
  837.     {$ENDC}
  838. FUNCTION InverseMatrix({CONST}VAR m: MatrixRecord; VAR im: MatrixRecord): BOOLEAN;
  839.     {$IFC NOT GENERATINGCFM}
  840.     INLINE $701C, $ABC2;
  841.     {$ENDC}
  842. PROCEDURE ConcatMatrix({CONST}VAR a: MatrixRecord; VAR b: MatrixRecord);
  843.     {$IFC NOT GENERATINGCFM}
  844.     INLINE $701B, $ABC2;
  845.     {$ENDC}
  846. PROCEDURE RectMatrix(VAR matrix: MatrixRecord; {CONST}VAR srcRect: Rect; {CONST}VAR dstRect: Rect);
  847.     {$IFC NOT GENERATINGCFM}
  848.     INLINE $701E, $ABC2;
  849.     {$ENDC}
  850. PROCEDURE MapMatrix(VAR matrix: MatrixRecord; {CONST}VAR fromRect: Rect; {CONST}VAR toRect: Rect);
  851.     {$IFC NOT GENERATINGCFM}
  852.     INLINE $701D, $ABC2;
  853.     {$ENDC}
  854.  
  855. {$ALIGN RESET}
  856. {$POP}
  857.  
  858. {$SETC UsingIncludes := ImageCompressionIncludes}
  859.  
  860. {$ENDC} {__IMAGECOMPRESSION__}
  861.  
  862. {$IFC NOT UsingIncludes}
  863.  END.
  864. {$ENDC}
  865.